inherited FrotinaGeraCobrancaProgramada: TFrotinaGeraCobrancaProgramada
  Left = 261
  Top = 185
  Width = 767
  Height = 530
  Caption = 'Gera Cobran'#231'a Programada'
  Constraints.MaxHeight = 530
  Constraints.MaxWidth = 767
  Constraints.MinHeight = 530
  Constraints.MinWidth = 767
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  inherited panel2: TPanel
    Width = 759
    inherited BtnExec: TBitBtn
      OnClick = BtnExecClick
    end
  end
  inherited pnBg: TPanel
    Width = 759
    Height = 461
    object Panel1: TPanel
      Left = 1
      Top = 1
      Width = 757
      Height = 316
      Align = alTop
      TabOrder = 0
      object Label18: TLabel
        Left = 5
        Top = 1
        Width = 103
        Height = 16
        Caption = 'Fonte de Recurso'
      end
      object DBLFonteRecurso: TDBLookupComboBox
        Tag = 5
        Left = 5
        Top = 19
        Width = 321
        Height = 22
        Ctl3D = False
        KeyField = 'FONT_CODIGO'
        ListField = 'FONT_DESCRICAO'
        ListSource = dsFonteRecurso
        ParentCtl3D = False
        TabOrder = 0
        OnKeyDown = DBLFonteRecursoKeyDown
      end
      object gbDocumento: TGroupBox
        Left = 345
        Top = 3
        Width = 409
        Height = 69
        Caption = '  Documento  '
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 1
        object Label10: TLabel
          Left = 10
          Top = 16
          Width = 24
          Height = 16
          Caption = 'Tipo'
        end
        object Label16: TLabel
          Left = 207
          Top = 16
          Width = 45
          Height = 16
          Caption = 'N'#250'mero'
        end
        object Label19: TLabel
          Left = 287
          Top = 16
          Width = 27
          Height = 16
          Caption = 'Data'
        end
        object DBLCBTipoDocumento: TDBLookupComboBox
          Tag = 5
          Left = 10
          Top = 36
          Width = 188
          Height = 22
          KeyField = 'TIPO_DOC_CODIGO'
          ListField = 'TIPO_DOC_DESCRICAO'
          ListSource = DSTipoDocumento
          TabOrder = 0
          OnKeyDown = DBLCBTipoDocumentoKeyDown
        end
        object EDocumento: TEdit
          Tag = 5
          Left = 207
          Top = 36
          Width = 70
          Height = 22
          MaxLength = 6
          TabOrder = 1
        end
        object DTDataDocumento: TDateEdit
          Tag = 5
          Left = 286
          Top = 36
          Width = 113
          Height = 23
          ButtonWidth = 26
          NumGlyphs = 2
          TabOrder = 2
        end
      end
      object gbCheque: TGroupBox
        Left = 10
        Top = 72
        Width = 744
        Height = 72
        Caption = '  Dados do Cheque  '
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 2
        object Label5: TLabel
          Left = 10
          Top = 20
          Width = 37
          Height = 16
          Caption = 'Banco'
        end
        object Label14: TLabel
          Left = 79
          Top = 20
          Width = 47
          Height = 16
          Caption = 'Ag'#234'ncia'
        end
        object Label20: TLabel
          Left = 148
          Top = 20
          Width = 34
          Height = 16
          Caption = 'Conta'
        end
        object Label21: TLabel
          Left = 246
          Top = 20
          Width = 18
          Height = 16
          Caption = 'N'#186' '
        end
        object Label22: TLabel
          Left = 315
          Top = 20
          Width = 52
          Height = 16
          Caption = 'Emitente'
        end
        object edBanco: TEdit
          Tag = 5
          Left = 10
          Top = 39
          Width = 60
          Height = 22
          MaxLength = 4
          TabOrder = 0
        end
        object edAgencia: TEdit
          Tag = 5
          Left = 79
          Top = 39
          Width = 60
          Height = 22
          MaxLength = 6
          TabOrder = 1
        end
        object edConta: TEdit
          Tag = 5
          Left = 148
          Top = 39
          Width = 90
          Height = 22
          MaxLength = 10
          TabOrder = 2
        end
        object edNumero: TEdit
          Tag = 5
          Left = 246
          Top = 39
          Width = 60
          Height = 22
          MaxLength = 6
          TabOrder = 3
        end
        object edEmitente: TEdit
          Tag = 5
          Left = 315
          Top = 39
          Width = 421
          Height = 22
          MaxLength = 40
          TabOrder = 4
        end
      end
      object gbInfo: TGroupBox
        Left = 10
        Top = 144
        Width = 744
        Height = 171
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 3
        object Label6: TLabel
          Left = 15
          Top = 12
          Width = 67
          Height = 16
          Caption = 'Cliente (F8)'
        end
        object Label7: TLabel
          Left = 388
          Top = 12
          Width = 49
          Height = 16
          Caption = 'Portador'
        end
        object Label8: TLabel
          Left = 15
          Top = 58
          Width = 168
          Height = 16
          Caption = 'Classifica'#231#227'o Financeira (F8)'
        end
        object Label4: TLabel
          Left = 388
          Top = 102
          Width = 51
          Height = 16
          Caption = 'Hist'#243'rico'
        end
        object Label13: TLabel
          Left = 388
          Top = 59
          Width = 121
          Height = 16
          Caption = 'Centro de Custo (F8)'
        end
        object Label17: TLabel
          Left = 15
          Top = 102
          Width = 85
          Height = 16
          Caption = 'Conta Cont'#225'bil'
        end
        object DBText3: TDBText
          Left = 117
          Top = 102
          Width = 50
          Height = 16
          AutoSize = True
          DataField = 'PLANOCONT_CODIGOCONTABIL'
        end
        object Label23: TLabel
          Left = 15
          Top = 144
          Width = 183
          Height = 16
          Caption = 'F7 = Todos; F8 = Relacionados'
        end
        object DBLCBCliente: TDBLookupComboBox
          Tag = 5
          Left = 15
          Top = 31
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'CLI_CODIGO'
          ListField = 'CLI_RAZAO'
          ListSource = DSCliente
          ParentCtl3D = False
          TabOrder = 0
          OnExit = DBLCBClienteExit
          OnKeyDown = DBLCBClienteKeyDown
        end
        object DBLCBPortador: TDBLookupComboBox
          Tag = 5
          Left = 388
          Top = 31
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'PORT_CODIGO'
          ListField = 'PORT_DESCRICAO'
          ListSource = DSPortador
          ParentCtl3D = False
          TabOrder = 1
          OnExit = DBLCBPortadorExit
          OnKeyDown = DBLCBPortadorKeyDown
        end
        object DBLCBPlano: TDBLookupComboBox
          Tag = 5
          Left = 15
          Top = 75
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'CODIGO'
          ListField = 'DESCRICAO'
          ListSource = DSPlano
          ParentCtl3D = False
          TabOrder = 2
          OnExit = DBLCBPlanoExit
          OnKeyDown = DBLCBPlanoKeyDown
        end
        object DBLCBCentroCusto: TDBLookupComboBox
          Tag = 5
          Left = 388
          Top = 75
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'CODIGO'
          ListField = 'DESCRICAO'
          ListSource = DSCentro
          ParentCtl3D = False
          TabOrder = 3
          OnEnter = DBLCBCentroCustoEnter
          OnKeyDown = DBLCBCentroCustoKeyDown
        end
        object DBLCBContaContabil: TDBLookupComboBox
          Tag = 5
          Left = 15
          Top = 119
          Width = 338
          Height = 22
          Hint = '(F7 - Todo , F8 -Relacionados)'
          Ctl3D = False
          KeyField = 'PLANOCONT_CODIGO'
          ListField = 'PLANOCONT_DESCRICAO'
          ListSource = DSPlanoContabil
          ParentCtl3D = False
          TabOrder = 4
          OnClick = DBLCBContaContabilClick
          OnKeyDown = DBLCBContaContabilKeyDown
          OnKeyUp = DBLCBContaContabilKeyUp
        end
        object EHistorico1: TEdit
          Tag = 5
          Left = 388
          Top = 119
          Width = 338
          Height = 22
          Ctl3D = False
          MaxLength = 50
          ParentCtl3D = False
          TabOrder = 5
        end
        object EHistorico2: TEdit
          Tag = 5
          Left = 388
          Top = 142
          Width = 338
          Height = 22
          Ctl3D = False
          MaxLength = 50
          ParentCtl3D = False
          TabOrder = 6
        end
      end
    end
    object Panel3: TPanel
      Left = 334
      Top = 317
      Width = 424
      Height = 143
      Align = alRight
      TabOrder = 1
      object Label9: TLabel
        Left = 15
        Top = 17
        Width = 158
        Height = 16
        Caption = 'Quantidade de  Presta'#231#245'es'
      end
      object Label11: TLabel
        Left = 15
        Top = 48
        Width = 62
        Height = 16
        Caption = 'Valor Total'
      end
      object Label12: TLabel
        Left = 15
        Top = 79
        Width = 126
        Height = 16
        Caption = 'Valor da 1'#170' Presta'#231#227'o'
      end
      object Label15: TLabel
        Left = 15
        Top = 110
        Width = 215
        Height = 16
        Caption = 'Valor da(s) Pr'#243'xima(s) Presta'#231#245'es(s)'
      end
      object EValorProximaPrestacao: TEdit
        Tag = 5
        Left = 230
        Top = 110
        Width = 88
        Height = 22
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 3
        OnEnter = EValorProximaPrestacaoEnter
        OnExit = EValorProximaPrestacaoExit
      end
      object EValorPrimeiraPrestacao: TEdit
        Tag = 5
        Left = 229
        Top = 79
        Width = 87
        Height = 22
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 2
        OnEnter = EValorPrimeiraPrestacaoEnter
        OnExit = EValorPrimeiraPrestacaoExit
      end
      object EValorTotal: TEdit
        Tag = 5
        Left = 229
        Top = 48
        Width = 87
        Height = 22
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 1
        OnEnter = EValorTotalEnter
        OnExit = EValorTotalExit
        OnKeyPress = EValorTotalKeyPress
      end
      object ENumeroPrestacao: TEdit
        Tag = 5
        Left = 229
        Top = 17
        Width = 37
        Height = 22
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 0
        OnEnter = ENumeroPrestacaoEnter
        OnExit = ENumeroPrestacaoExit
      end
      object BAjutarValor: TButton
        Tag = 5
        Left = 324
        Top = 47
        Width = 97
        Height = 54
        Caption = 'Ajustar Valor'
        TabOrder = 5
        OnClick = BAjutarValorClick
      end
      object ChBemiteBoleto: TCheckBox
        Tag = 5
        Left = 327
        Top = 108
        Width = 94
        Height = 21
        Caption = 'Emite boleto'
        TabOrder = 4
      end
    end
    object Panel4: TPanel
      Left = 1
      Top = 317
      Width = 333
      Height = 143
      Align = alClient
      TabOrder = 2
      object Label1: TLabel
        Left = 15
        Top = 20
        Width = 64
        Height = 16
        Caption = 'Data Inicial'
      end
      object Label2: TLabel
        Left = 16
        Top = 50
        Width = 95
        Height = 16
        Caption = 'Intervalo de Dias'
      end
      object Label3: TLabel
        Left = 16
        Top = 81
        Width = 61
        Height = 16
        Caption = 'Fixar dia ?'
      end
      object CheckBSim: TCheckBox
        Left = 172
        Top = 81
        Width = 53
        Height = 21
        Caption = 'Sim'
        TabOrder = 0
        OnClick = CheckBSimClick
      end
      object CheckBNao: TCheckBox
        Left = 231
        Top = 81
        Width = 53
        Height = 21
        Caption = 'N'#227'o'
        Checked = True
        State = cbChecked
        TabOrder = 1
        OnClick = CheckBNaoClick
      end
      object EIntervaloDias: TEdit
        Tag = 5
        Left = 172
        Top = 50
        Width = 41
        Height = 22
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 2
        OnEnter = EIntervaloDiasEnter
        OnExit = EIntervaloDiasExit
        OnKeyPress = EIntervaloDiasKeyPress
      end
      object DEDataInicial: TDateEdit
        Tag = 5
        Left = 172
        Top = 20
        Width = 114
        Height = 26
        Ctl3D = False
        ButtonWidth = 26
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 3
      end
    end
  end
  object DSPortador: TDataSource
    DataSet = DMFinanceiro.Qportador
    Left = 48
    Top = 512
  end
  object DSTipoDocumento: TDataSource
    DataSet = DMFinanceiro.QTipoDocumento
    Left = 104
    Top = 512
  end
  object DSCliente: TDataSource
    DataSet = DMGestao.QCliente
    Left = 144
    Top = 512
  end
  object DSPlano: TDataSource
    DataSet = DMFinanceiro.QPlanoEntrada
    Left = 176
    Top = 512
  end
  object DSCentro: TDataSource
    DataSet = DMFinanceiro.QCentro
    Left = 240
    Top = 520
  end
  object dsFonteRecurso: TDataSource
    DataSet = DMFinanceiro.QFonteRecurso
    Left = 318
    Top = 453
  end
  object QCheque: TQuery
    Active = True
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'SELECT '
      '  CHEQUE.CH_CODIGO,'
      '  CHEQUE.CH_DTLANCTO,'
      '  CHEQUE.CH_BANCO,'
      '  CHEQUE.CH_AGENCIA,'
      '  CHEQUE.CH_CONTA,'
      '  CHEQUE.CH_CHEQUE,'
      '  CHEQUE.CH_VALOR,'
      '  CHEQUE.CH_VENCTO,'
      '  CHEQUE.CH_EMITENTE,'
      '  CHEQUE.CH_ORIGEM,'
      '  CHEQUE.CH_COD_ORIGEM,'
      '  CHEQUE.CH_DTMOVTO,'
      '  CHEQUE.CH_PORTADOR,'
      '  CHEQUE.CH_SITUACAO,'
      '  CHEQUE.CH_DTSITUACAO,'
      '  CHEQUE.CH_PAGTO,'
      '  CHEQUE.CH_COD_PAGTO,'
      '  CHEQUE.CODIGOEMPRESA,'
      '  CHEQUE.USUARIO,'
      '  CHEQUE.DATAMODIFICACAO,'
      '  CHEQUE.COD_MOVTO,'
      '  CHEQUE.CH_CLIENTE,'
      '  CHEQUE.CH_OBS'
      'FROM'
      '  CHEQUE')
    Left = 438
    Top = 434
  end
  object QChequeHistorico: TQuery
    Active = True
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'SELECT '
      '  CHEQUE_HISTORICO.CH_CODIGO,'
      '  CHEQUE_HISTORICO.CH_DTLANCTO,'
      '  CHEQUE_HISTORICO.CH_BANCO,'
      '  CHEQUE_HISTORICO.CH_AGENCIA,'
      '  CHEQUE_HISTORICO.CH_CONTA,'
      '  CHEQUE_HISTORICO.CH_CHEQUE,'
      '  CHEQUE_HISTORICO.CH_VALOR,'
      '  CHEQUE_HISTORICO.CH_VENCTO,'
      '  CHEQUE_HISTORICO.CH_EMITENTE,'
      '  CHEQUE_HISTORICO.CH_ORIGEM,'
      '  CHEQUE_HISTORICO.CH_COD_ORIGEM,'
      '  CHEQUE_HISTORICO.CH_DTMOVTO,'
      '  CHEQUE_HISTORICO.CH_PORTADOR,'
      '  CHEQUE_HISTORICO.CH_SITUACAO,'
      '  CHEQUE_HISTORICO.CH_DTSITUACAO,'
      '  CHEQUE_HISTORICO.CH_PAGTO,'
      '  CHEQUE_HISTORICO.CH_COD_PAGTO,'
      '  CHEQUE_HISTORICO.CODIGOEMPRESA,'
      '  CHEQUE_HISTORICO.USUARIO,'
      '  CHEQUE_HISTORICO.DATAMODIFICACAO,'
      '  CHEQUE_HISTORICO.COD_MOVTO,'
      '  CHEQUE_HISTORICO.CH_CLIENTE,'
      '  CHEQUE_HISTORICO.CH_OBS'
      'FROM'
      '  CHEQUE_HISTORICO')
    Left = 470
    Top = 434
  end
  object QPlanoContabil: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'select * from PlanoContabilidade'
      'Where CodigoEmpresa = :Emp'
      'Order By PlanoCont_CodigoContabil')
    Left = 478
    Top = 506
    ParamData = <
      item
        DataType = ftString
        Name = 'Emp'
        ParamType = ptUnknown
        Value = '1'
      end>
  end
  object QContasReceber: TQuery
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'select * from PlanoContabilidade'
      'Where CodigoEmpresa = :Emp'
      'Order By PlanoCont_CodigoContabil')
    Left = 414
    Top = 514
    ParamData = <
      item
        DataType = ftString
        Name = 'Emp'
        ParamType = ptUnknown
        Value = '1'
      end>
  end
  object DSPlanoContabil: TDataSource
    DataSet = QPlanoContabil
    Left = 510
    Top = 506
  end
end
